﻿
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="AddDocument.aspx.vb" Inherits="GetDocuments" %>


    <% 
    
        Dim filename, comments As String
        Dim texteretour As String
        filename = Request.QueryString("FileName")
        comments = Request.QueryString("Comment")
        texteretour = CreateDoc(filename, comments)
        Response.ContentType = "text/xml"
        Response.Write(texteretour)

    %>
    
  